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INTRODUCTION 


The NASTRAN computer program Is capable of executing on three different 
types of computers: namely, the CDC 6000 series, the IBM 360-370 series, aad 

the UNIVAC 1100 series. A typical activity requiring transfer of data between 
dissimilar computers Is the analysis of a large structure such as the Space 
Shuttle by substructuring. Models of portions of the vehicle which have been 
analyzed by subcontractors using their computers must be integrated into a 
model of the complete structure by the prime contractor on his computer. 

Presently the transfer of NASTRAN matrices or tables between two different types 
of computers is accomplished by punched cards or a magnetic tape containing 
card images. These methods of data transfer do not satisfy the requirements for 
intercomputer data transfer associated with a substructuring activity because 
(1) accuaracy will be lost due to the precision limitations (10 significant 
digits) of the NASTRAN Direct Matrix Input (DMI) punched card, and (2) large 
order matrices make card handling too cumbersome. 

To provide a more satlsfac' >ry transfer of data, two new programs, RDUSER 
and WRTUSER, were created (ref. 1). These two programs, used in conjunction 
with the NASTRAN modules OUTPUT 2 and INPUTT2 available in Level 15 and later 
versions of NASTRAN, allow data to be transferred between computers without loss 
of accuracy and without handling large deck:* of punched cards. The purpose of 
this paper is to describe both the method used for data transfer and the special 
features of the utility programs RDUSER and WRTUSER. Although data may come from 
any computer program using the NASTRAN user tape format , examples in this paper 
will be confined to NASTRAN data since RDUSER and WRTUSER were written with tne 
NASTRAN user in mind. 


OVERVIEW OF PROGRAMS 


Beginning with Level 15, NASTRAN provided the capability of using FORTRAN 
WRITE statements to write intermediate data blocks (matrices or tables) on a 
magnetic tape. Thiw was made possible by the NASTRAN module 0UTPUT2 ;hich his 
the following calling sequence: 

0UTPUT2 DB1, DB2, DB3, DBA, DB5//V, N, Pl/V, N, P2/V, N, P3 $ 

ffiECa>IN0 PAGE bunk not filmed 



where the DBi are the data blocks to be written in tape. Pi is a parameter for 
positioning the tape, P2 Is the FORTRAN unit number assigned to the tape, and 
P3 is the FORTRAN Usci Tape Label (default = XXXXXXXX) . 

The tape created by 0UTPUT2 is a binary tape. Tapes created by programs 
other than NASTRAN are acceptable as long as the data are output in the 0UTPUT2 
format. In order to write the header information on the tape, the PI parameter 
must be -1 (rewind before writing) the first time 0UTPUT2 is called in NASTRAN; 
otherwise PI is 0. This binary tape must be converted to a BCD tape before it 
can be used on a computer of a different type. The conversion is performed 
by the utility program RDUSER which accepts tables and single-precision or 
double-precision real or complex matrices. No precision is lost in generating 
the BCD tape, and the problem of handling large numbers of punched cards is 
alleviated . 

The tape containing the BCD data is transferred to another installation. 
Before these data can be used as input for NASTRAN at this installation, two 
tasks must be performed. The first task is to convert the source of the BCD 
tape written by RDUSER to another source form readable by the computer on 
which the data will be used. The second task is to convert the BCD tape into 
an acceptable binary form for the NASTP.AN module INPUTT2. The program WRTUSER 
accomplishes both of these tasks. The calling sequence for the INPUTT2 module 
has the form 

INPUTT2/DB1, DB2, DB3, DB4, DB5/V, N, Pl/V, N, P2/V, N, P3 $ 

where the DBi are the data blocks to be recovered from the binary tape. Pi is 
a parameter for positioning the tape (PI must be -1 for the first call to 
INPUTT2 and 0 for all succeeding calls) , P2 is the FORTRAN unit number assigned 
to the binary tape, and P3 is the FORTRAN User Tape Label (default = XXXXXXXX) . 

A flow chart of the complete tape interface method is shown in figure 1. 


SPECIAL FEATURES 


The RDUSER program has three special features that will be covered in this 
section. The first group of cards input to RDUSER is a set of comments written 
by the user to describe the matrices and tables. These cards are read with 
a free-field format allowing the user to write any description he desires. These 
comments are also written on the tape to be transferred to the other installa- 
tion. WRTUSER reads and prints these comments; this allows the user receiving 
the tape to have some knowledge of the data written on the tape. The next 
group of cards input to RDUSER gives the data block name, a code for determining 
whether the data block is a matrix or a table, and a print option. This group 
of cards allows the user to omit any data block that is not needed. He does 
this by simply omitting the card on which the data block name appears. The 
print option allows the user to print (table 1) or not to print (table 2) 
elements of a matrix or table. Each of these features proves beneficial when 
transferring data between dissimilar computers. 
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VERIFICATION OF PROGRAMS 


RDUSER and WRTUSER were executed for four* of the nine possibilities shown 
in figure 2 and found to possess the desired qualities lacking in DMI punched 
cards. Card handling for the input to NASTRAN was cut to the minimum. Square, 
rectangular, and symmetric matrices containing single-precision real, single- 
precision complex, double-precision real, and double-precision complex elements 
were used in the test runs. In each case the answers listed on one computer 
agreed with the answers listed on dissimilar and similar computers: this 
indicated that no precision was lost in the transfer. 
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*UNIVAC paths were not tested due to errors in the INPUTT2 and 0UTPUT2 
NASTRAN modules. 
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